#include<iostream>
#include<cstring>
#include<set>
#include<deque>
using namespace std;
const int N=12,M=N*N,E=400,P=1<<10;
typedef pair<int,int> PII;
#define x first
#define y second
int n,m,p,k;
int h[M],e[E],w[E],ne[E],idx;
int g[N][N];
int key[M];
int dist[M][P];
bool st[M][P];
set<PII> edges;

void add(int a,int b,int c)
{
    e[idx]=b,w[idx]=c,ne[idx]=h[a],h[a]=idx++;
}

void build()
{
    int dirs[4][2]={{1,0},{0,1},{-1,0},{0,-1}};
    
    for(int i=1;i<=n;++i)
        for(int j=1;j<=m;++j)
            for(auto dir:dirs)
            {
                int x=i+dir[0],y=j+dir[1];
                if(x>0&&x<=n&&y>0&&y<=m)
                {
                    int a=g[i][j],b=g[x][y];
                    if(!edges.count({a,b})) add(a,b,0);
                }
            }
}

int bfs()
{
    memset(dist,0x3f,sizeof dist);
    dist[1][0]=0;
    
    deque<PII> q;
    q.emplace_back(1,0);
    while(q.size())
    {
        auto t=q.front();
        q.pop_front();
        
        if(st[t.x][t.y]) continue;
        st[t.x][t.y]=true;
        
        if(t.x==n*m) return dist[t.x][t.y];
        
        if(key[t.x])
        {
            int state=t.y|key[t.x];
            if(dist[t.x][state]>dist[t.x][t.y])
            {
                dist[t.x][state]=dist[t.x][t.y];
                q.emplace_front(t.x,state);
            }
        }
        
        for(int i=h[t.x];~i;i=ne[i])
        {
            int j=e[i];
            if(w[i] && !(t.y>>w[i]-1&1)) continue;
            if(dist[j][t.y]>dist[t.x][t.y]+1)
            {
                dist[j][t.y]=dist[t.x][t.y]+1;
                q.emplace_back(j,t.y);
            }
        }
    }
    return -1;
}

int main()
{
    cin>>n>>m>>p>>k;
    
    for(int i=1,t=1;i<=n;++i)
        for(int j=1;j<=m;++j)
            g[i][j]=t++;
    
    memset(h,-1,sizeof h);
    while(k--)
    {
        int x1,y1,x2,y2,c;
        cin>>x1>>y1>>x2>>y2>>c;
        int a=g[x1][y1],b=g[x2][y2];
        edges.insert({a,b}),edges.insert({b,a});
        if(c)add(a,b,c),add(b,a,c);
    }
    
    build();
    int s;
    cin>>s;
    while(s--)
    {
        int x,y,id;
        cin>>x>>y>>id;
        key[g[x][y]]|=1<<id-1;
    }
    cout<<bfs()<<endl;
    return 0;
}